package Module;

sub import
{
	Core::register_module($_[0]);
}

sub define_command
{
	my $module = caller();
	my $command = shift;
	my $callback = shift;
	my $help;
	if(@_ and UNIVERSAL::isa($_[-1], "HASH")) {
		$help = pop;
	}
	my $args = [@_];
	Core::register_command($command, $module, {callback => $callback, help => $help, args => $args});
}
1
